﻿Imports DevExpress.XtraTabbedMdi
Imports LINKARReport.dllLib

Module ModPub
    Public CUserName As String  '//授权用户名
    Public CSecuriKey As String  '//类授权码
    Public CProcKey As String  '//类过程及函数授权码
    Public Mdb As DbInfo '//数据库信息公用变量
   ' Public MLog As Loglib '//日志类命令申明 
    Public MUser As UserInfo '//用户信息 
    Public MPassKey As String '//验证码 
    Public MCheckCode As String '//校验码 
    Public MSysID As String '应用实例id  
    Public MClsConfig As ConfigLib '配置类 
  '  Public MUserVerify As UserVerifyLib '用户验证类 2018.2.4  
    public MMoneyType As String '2023.2.28 币种信息，f_report新增了m_moneytype字段
        ''' <summary>
    ''' 2019.7.3
    ''' 用户验证所需验证码
    ''' </summary>
    ''' <remarks></remarks>
    Public UPassKey As String '用户验证所需验证码 2017/9/20
    ''' <summary>
    ''' 2019.7.3
    ''' 用户验证所需校验码
    ''' </summary>
    ''' <remarks></remarks>
    Public UCheckCode As String '用户验证所需校验码 2017/9/20
'        ''' <summary>
'    ''' 2019.7.3
'    ''' ini文件      
'    ''' </summary>
'    ''' <remarks></remarks>
'    Public MiniPath As String
'        ''' <summary>
'    ''' 2019.7.3
'    ''' 说明：启用ini文件    
'    ''' </summary>
'    ''' <remarks></remarks>
'    Public Mini As Ini
        ''' <summary>
    ''' 2019.7.3
    ''' 说明：调用程序集的类库变量     
    ''' </summary>
    ''' <remarks></remarks>
    Public MAssemblyLib As AssemblyLib(Of String)
'        ''' <summary>
'    ''' 2019.7.3
'    ''' 说明：用户信息属性.含授权用户名UserName ，类授权码SecuriKey,     类过程及函数授权码ProcKey     
'    ''' </summary>
'    ''' <remarks></remarks>
'    Public MUserSecurity As UserSecurity
    #Region "权限变量"
    ''' <summary>
    ''' 2019.7.3
    ''' 报表权限策略
    ''' </summary>
    Public MModPowerMReprt As  new ModPowerMRpoert
        ''' <summary>
    ''' 2019.7.3
    ''' 定义主程序的窗体     
    ''' </summary>
    ''' <remarks></remarks>
    Public MainForm As System.Windows.Forms.Form
        ''' <summary>
    ''' 2019.7.3
    ''' 主程序窗体传递过来的MDI控件     
    ''' </summary>
    ''' <remarks></remarks>
    Public MMdiManagers As XtraTabbedMdiManager
        ''' <summary>
    ''' 2018.3.12
    ''' 说明：当前程序集名称     
    ''' </summary>
    ''' <remarks></remarks>
    Public MAssemblyName As String '
#End Region


        ''' <summary>
    ''' 2018.3.12
    ''' 说明：获取本地dll的程序集名      
    ''' </summary>
    ''' <remarks></remarks>
    Public Sub P_GetAssembleyName()
        MAssemblyLib = New AssemblyLib(Of String)()
        With MAssemblyLib
            .GetAssemblyName()
            MAssemblyName = .AssemblyName
        End With
    End Sub
End Module


